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EXECUTIVE  SUMMARY 


The  Validation  Summary  Report  presents  the  results  and  con¬ 
clusions  of  testing  performed  on  the  SYSTEAM-German  MoD  SI. 5 
compiler.  Standardized  tests  serve  as  input  to  an  Ada  com¬ 
piler,  producing  result  ,  which  are  evaluated  by  the  valida¬ 
tion  team.  This  summary  briefly  states  the  highlights  of 
the  SYSTEAM-German  MoD  SI. 5  validation. 

On-site  testing  was  performed  86-06-04  through  86-06-24  at 
D-8012  Ottobrunn  under  the  auspices  of  the  IABG  m.b.H.,  Dept 
SZT  ( AVF ) ,  according  to  Ada  Validation  Office  policies  and 
procedures.  The  SYSTEAM-German  MoD  SI. 5  is  hosted  on  Sie¬ 
mens  7.536  operating  under  BS2000  V7.5.  The  suite  of  tests 
known  as  the  Ada  Compiler  Validation  Capability  (ACVC),  Ver¬ 
sion  1.7,  was  used.  The  ACVC  is  used  to  validate  confor¬ 
mance  of  a  compiler  to  ANSI/MIL-STD-1815A  Ada.  The  purpose 
of  testing  is  to  ensure  that  a  compiler  properly  implements 
legal  language  constructs  and  that  it  identifies  and  rejects 
illegal  language  constructs.  The  testing  also  identifies 
behavior  that  is  implementation  dependent  but  permitted  by 
the  Ada  Standard.  Six  classes  of  tests  are  used.  These 
tests  are  designed  to  perform  checks  at  compile  time,  at 
link  time,  or  during  execution. 

The  results  of  validation  are  summarized  in  the  following 


1  • 

RESULT 

A 

B 

TEST 

C 

CLASS 

D 

E 

L 

TOTAL 

Passed 

68 

811 

1118 

17 

9 

21 

2044 

Failed 

0 

0 

0 

0 

0 

0 

0 

Inapplicable 

0 

13 

202 

0 

2 

2 

219 

Anomalous 

0 

0 

0 

0 

0 

0 

0 

Withdrawn 

0 

4 

12 

0 

0 

0 

16 

TOTAL 

68 

828 

1332 

17 

11 

23 

2279 

Tests  found  to  contain  errors  were  withdrawn  from  Version 
1.7  of  the  Ada  Compiler  Validation  Capability  (ACVC).  When 
validation  was  completed,  the  tests  listed  in  Chapter  2.2 
had  been  withdrawn. 

Some  tests  demonstrate  that  language  features  are  not  sup¬ 
ported  by  an  implementation.  For  this  implementation  the 
tests  determined  the  following. 


SHORT_INTEGER  is  not  supported: 

B52004E-AB . DEP  B55B09D-AB . DEP  B86001CR-AB . DEP 

C34001D-B .DEP  C55B07B-AB. DEP 

LONG_INTEGER  is  not  supported: 

B52004D-AB. DEP  355B09C-AB . DEP  B86001CS-AB. DEP 

C3400 1E-B . DEP  C55B07A-AB . DEP 

SHORT_FLOAT  is  not  supported : 

B36001CP-AB .DEP  C3400 1F-B . DEP  C  3  5  70  2A-AB . DEP 

LONG_FLOAT  is  not  supported: 

B8600 1CQ-AB .DEP  C34001G-B . DEP  C35702B-AB . DEP 

Representation  specifications  for  noncontiguous 
enumeration  representations  are  allowed: 

C55B16A-AB. DEP 

No  integer  type  other  than  INTEGER, 

SHGRT_INTEGER,  AND  LONG_INTEGER  is  supported: 

B86001DT-AB. DEP 

The  package  SYSTEM  is  used  by  package  TEXT_I0: 
C86001F-B . DEP 

The  'SIZE  clause  is  supported: 

C87B62A-B . DEP 

The  ' STORAGE_SIZE  clause  is  supported: 

C87B62B . DEP 

The  'SMALL  clause  is  supported: 

C87B62C-B.DEP 

Generic  unit  specifications  and  bodies  can  be 
compiled  in  separate  compilations  : 

CA10 1 2A-B . DEP 
CA2009C-B . DEP 
CA200F-B . DEP 


.  Pragma  INLINE  is  not.  supported  for  procedures : 
LA3Q04A-AB .ADA  EA3004C-B . ADA  CA3004E-B . ADA 
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Pragma  INLINE  is  not  supported  for  functions: 

LA3004B-AB . ADA  EA3004D-B . ADA  CA3004F-B . ADA 
Mode  IN_FILE  is  supported  (for  sequential  I/O): 
CE2102D-B . ADA 

Mode  OUT_FILE  is  supported  (for  sequential  I/O): 
CE2102E-B .ADA 

Mode  INOUT_FILE  is  supported  (for  direct  I/O): 

CE  2102F-B . ADA 

Mode  RESET  and  DELETE  are  supported 
(for  sequential  and  direct  I/O): 

CE2102G-B .ADA 

Mode  IN_FILE  is  supported  (for  direct  I/O): 
CE2102I-B. ADA 

Mode  OUT_FILE  is  supported  (for  direct  I/O): 
CE2102J-B. ADA 

Dynamic  creation  and  deletion  of  files  are  allowed: 

CE2106A-B. ADA  CE31 10A-B . DEP 

No  more  than  one  internal  file  can  be  associated 
with  the  same  external  file,  except  for  reading: 

CE2107B-B .ADA  CE2 10 7C-B . ADA  CE2 1 1 1D-B . ADA 
CE3114B-B. ADA  CE3 1 1 1B-B . ADA  CE31 1 1C-B . ADA 

More  than  one  internal  file  can  be  associated 
with  the  some  external  file  for  reading: 

CE2 107A-B .ADA  CE2 10 7F-B . ADA  CE 3 1 1 1A-B . ADA 

Instantiation  of  package  SEQUENTIAL_IO  with 
unconstrained  array  types  is  allowed: 

CE220 1 D-B . DEP 
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.  Instantiation  of  package  SEQUENTIAL_IO  with 

unconstrained  record  types  with  discriminants  is 
allowed : 

CE2  201E-B . DEP 

.  Dynamic  creation  and  resetting  of  files  is  supported: 
CE  221 OA-B . ADA 

.  Instantiation  of  package  DIRECT_IO  with 
unconstrained  array  types  and  unconstrained 
types  with  discriminants  is  supported: 

CE2401D-B . DEP 

.  An  external  file  associated  with  more  than  one 
internal  file  cannot  be  reset: 

CE3115A-B.ADA 

.  Illegal  filenames  can  exist: 

CE2 102C-B . DEP 

.  Discriminant  constraints  are  not  allowed  before 
full  type  declaration: 

C48006B-B .ADA  B74207A-B . ADA 
B  3  7  004A-B . ADA  BC3503A-B. ADA 
B  3  8 1 0  5B -AB . ADA 

.  Execution  of  library  tests  is  discountinued  after 
termination  of  the  main  program  (see  AI-00399): 

C94004A-B .ADA 
C94004B-B . ADA 
C94004C-B .ADA 

ACVC  Version  1.7  was  present  on-site  on  magnetic  tape  at  D- 
8012  Ottobrunn.  The  tape  was  loaded,  and  all  tests,  except 
for  the  executable  tests  which  make  use  of  a  floating  point 
precision  greater  than  SYSTEM. MAX_DIGITS,  were  compiled  on 
Siemens  7.536.  Class  A,  C,  D,  and  E  tests  were  executed  on 
Siemens  7 . 536. 

On  completion  of  testing,  all  results  were  analyzed  for 
failed  Class  A,  C,  D,  or  E  programs,  and  all  Class  B  and  L 
compilation  results  were  individually  analyzed. 

The  ACVC,  Version  1.7,  contains  2279  tests  of  which  2044 
were  applicable  to  SYSTEAM-German  MoD  SI. 5.  No  anomalies 
were  found  in  the  testing  of  this  compiler.  Testing  demon¬ 
strated  that  all  applicable  tests  were  passed  by  this 


compiler  and  conformed  to  the  Ada  Standard.  The  AVF  con¬ 
cluded  that  the  results  show  acceptable  compliance  to 
ANSI/ MIL-STD-131 5A  Ada. 
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CHAPTER  1 


INTRODUCTION 


The  Validation  Summary  Report  describes  how  an  Ada  compiler 
conforms  to  the  language  standard.  This  report  explains  all 
technical  terms  used  within  and  thoroughly  reports  the  Ada 
Compiler  Validation  Capability  (ACVC)  test  results.  Ada 
compilers  must  be  written  according  to  the  language  specifi¬ 
cation  as  given  in  the  ANSI/MIL-STD-1815A  Ada.  All 
implementation-defined  features  must  be  included  for  the 
compiler  to  conform  to  the  Standard.  Following  the  guide¬ 
lines  of  the  Standard  ensures  continuity  between  compilers. 
That  is,  the  entire  Standard  must  be  implemented,  and  noth¬ 
ing  can  be  implemented  that  is  not  in  the  Standard. 

Even  though  all  validated  Ada  compilers  conform  to  the  Stan¬ 
dard,  it  must  be  understood  that  some  differences  do  exist 
between  implementations.  ANSI/MIL-STD-1815A  permits  some 
implementation  dependencies,  e.g.,  the  maximum  length  of 
identifiers,  the  maximum  values  of  integer  types,  etc. 
These  implementation-dependent  features  limit  the  portabil¬ 
ity  of  programs  between  compilers.  Other  differences 
between  compilers  are  due  to  limitations  imposed  on  a  com¬ 
piler  by  the  operating  system  and  by  the  hardware.  All  of 
these  dependencies  are  given  in  the  report. 

Validation  summary  reports  are  written  according  to  a  stand¬ 
ardized  format.  Compiler  users  can,  therefore,  more  easily 
compare  the  reports  from  several  compilers  when  selecting  a 
compiler  for  a  given  task.  The  validation  report  can  be 
completed  mostly  from  the  test  results  produced  during  vali¬ 
dation  testing.  Additional  testing  information  is  given  at 
the  end  of  the  report  and  states  problems  and  details  which 
are  unique  for  a  specific  compiler.  The  format  of  the  vali¬ 
dation  report  limits  variance  between  reports,  enhances  rea¬ 
dability  of  the  report,  and  accelerates  report  readiness. 


1.1  Purpose  of  this  Validation  Summary  Report 

The  Validation  Summary  Report  documents  the  results  of  the 
testing  performed  on  an  Ada  compiler.  Testing  was  carried 
out  for  the  following  purposes: 

.  To  identify  any  language  constructs  supported  by  the 
translator  that  do  not  conform  to  the  Ada  Standard 

.  To  identify  any  unsupported  language  constructs  required 
by  the  Ada  Standard 


.  To  describe  the  implementation-dependent  behavior  allowed 
by  the  Ada  Standard 

Testing  of  this  compiler  was  conducted  by  IABG  m.b.H.,  Dept 
SZT  according  to  policies  and  procedures  established  by  the 
Ada  Validation  Office  (AVO).  Testing  was  conducted  from  86- 
06-04  through  86-06-24  at  D-8012  Ottobrunn. 


1.2  Use  of  this  Validation  Summary  Report 

Consistent  with  the  national  laws  of  the  originating  coun¬ 
try,  the  Ada  Validation  Office  may  make  full  and  free  public 
disclosure  of  this  report.  In  the  United  States,  this  is 
provided  in  accordance  with  the  "Freedom  of  Information  Act" 
(5  U.S.C.  no  552).  The  results  of  this  validation  apply 
only  to  the  computers,  operating  systems,  and  compiler  ver¬ 
sions  identified  in  this  report. 

The  organizations  represented  on  the  signature  page  of  this 
report  do  not  represent  or  warrant  that  any  statement  or 
statements  set  forth  in  this  report  are  accurate  or  com¬ 
plete,  or  that  the  subject  compiler  has  no  nonconformances 
to  the  Ada  Standard  other  than  those  presented.  This  report 
is  not  intended  for  the  purpose  of  publicizing  the  findings 
summarized  herein. 

Questions  regarding  this  report  or  the  validation  tests 
should  be  directed  to: 

Ada  Validation  Office 
Institute  for  Defense  Analyses 
1801  N.  Beauregard 
Alexandria  VA  22311 

and  to: 

IABG  m.b.H.,  Dept  SZT 
Einsteinstrasse 
D  3012  Ottobrunn 


1.3  REFERENCES 

1.  Reference  Manual  for  the  Ada  Programming  Language, 
ANSI/MIL-STD-181 5A,  Feb  1983 


1.4  DEFINITION  OF  TERMS 


Anomaly  A  test  result  that,  given  pre-validation 

analysis,  is  not  expected  during  formal  vali¬ 
dation  but  is  judged  allowable  under  the  cir¬ 
cumstances  . 

ACVC  The  Ada  Compiler  Validation  Capability.  A  set 

of  programs  that  evaluates  the  conformance  of 
a  compiler  to  the  Ada  language  specification, 
ANSI/MIL-STD-1815A. 

Ada  Standard  ANSI/MIL-STD-1815A,  February  1983. 

Applicant  The  agency  requesting  validation. 

AVF  The  IABG  m.b.H.,  Dept  SZT.  In  the  context  of 

this  report,  the  AVF  is  responsible  for  con¬ 
ducting  compiler  validations  according  to 
established  policies  and  procedures. 

A VO  The  Ada  Validation  Office.  In  the  context  of 

this  report,  the  AVO  is  responsible  for  set¬ 
ting  policies  and  procedures  for  compiler 
validations . 

Compiler  A  processor  for  the  Ada  language.  In  the  con¬ 

text  of  this  report,  a  compiler  is  any 
language  processor,  including  cross-compilers, 
translators,  and  interpreters. 

Failed  test.  A  test  for  which  the  compiler  generates  a 

result  that  demonstrates  nonconformance  to  the 
Ada  Standard. 

Host  The  computer  on  which  the  compiler  resides. 

Inapplicable  A  test  that  uses  features  of  the  language  that 

test  a  compiler  is  not  required  to  support  or  may 

legitimately  support  in  a  way  other  than  the 
one  expected  by  the  test. 

Passed  test  A  test  for  which  a  compiler  generates  the 

expected  result. 

Target  The  computer  for  which  a  compiler  generates 

code  . 

Test  A  program  that  evaluates  the  conformance  of  a 

compiler  to  a  language  specification.  In  the 
context  of  this  report,  the  term  is  used  to 
designate  a  single  ACVC  test.  The  text  of  a 
program  may  be  the  text  of  one  or  more  compi¬ 
lations  . 


Withdrawn  A  test  that  has  an  invalid  test  objective, 

test  fails  to  meet  its  test  objective,  or  contains 

illegal  use  of  the  language. 

1.5  Configuration 

The  candidate  compilation  system  for  this  validation  was 
tested  under  the  configuration: 

Compiler:  SYSTEAM-German  MoD  SI. 5 

Test.  Suite:  Ada  Compiler  Validation  Capability,  Version  1.7 
Host  Computer: 

Machine(s):  Siemens  7.536 

Operating  System:  BS2000  V7 . 5 

Memory  Size:  4  MB 

Disk  System:  Siemens  Disk  3470 

Target  Computer : 

Machine(s):  Siemens  7.536 

Operating  System:  BS2000  V7 . 5 

Memory  Size:  4  MB 

Disk  System:  Siemens  Disk  3470 
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CHAPTER  2 
TEST  RESULTS 


2.1  ACVC  Test  Classes 


Conformance  to  ANSI/MIL-STD-1815A  is  measured  using  the  Ada 
Compiler  Validation  Capability  (ACVC).  The  ACVC  contains 
both  legal  and  illegal  Ada  programs  structured  into  six  test 
classes:  A,  B,  C,  D,  E,  and  L.  Legal  programs  are  compiled 

and  executed  while  illegal  programs  are  just  compiled.  Sup¬ 
port  packages  are  used  to  report  the  results  of  the  legal 
programs.  A  compiler  must  correctly  process  each  of  the 
tests  in  the  suite  and  demonstrate  conformance  to  the  Ada 
Standard  by  either  meeting  the  pass  criteria  given  for  the 
test  or  by  showing  that  the  test  is  inapplicable  to  the 
implementation.  Tests  that  are  found  to  contain  errors  are 
withdrawn  from  the  ACVC.  The  results  of  validation  testing 
are  summarized  in  the  following  table: 

RESULT  TEST  CLASS  TOTAL 

A  B  C  D  E  L 


Passed 

Failed 

Inapplicable 
Anomalous 
Wi thdrawn 


68  811  1118  17 

0  0  0  0 

0  13  202  0 

0  0  0  0 

0  4  12  0 


9  21  2044 

0  0  0 

2  2  219 

0  0  0 

0  0  16 


TOTAL 


68  828  1332  17  11 


23  2279 


A  total  of  2093  tests  were  processed  during  this  validation 
attempt.  16  withdrawn  tests  in  Version  1.7  were  not  pro¬ 
cessed,  nor  were  170  Class  C  tests  that  were  inapplicable 
because  they  use  floating  point  types  having  digits  that 
exceed  the  maximum  value  for  the  implementation.  All  other 
tests  were  processed.  In  addition,  7  tests  (class  C)  for  the 
report  package  were  processed  and  passed. 


Some  conventions  are  followed  in  the  ACVC  to  ensure  that  the 
tests  are  reasonably  portable  without  modification.  For 
example,  the  tests  make  use  of  only  the  basic  55  character 
set,  contain  lines  with  a  maximum  length  of  72  characters, 
use  small  numeric  values,  and  place  features  that  may  not  be 
supported  in  separate  tests.  However,  some  tests  contain 
values  that  require  the  test  to  be  customized  according  to 
implementation-specific  values.  The  values  used  for  this 
validation  are  listed  in  Appendix  B. 
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2.1.1  Class  A  Tests 

Class  A  tests  check  that  legal  Ada  programs  can  be  success¬ 
fully  compiled  and  executed.  However,  no  checks  are  per¬ 
formed  during  execution  to  see  if  the  test  objective  has 
been  met.  For  example,  a  Class  A  test  checks  that  reserved 
words  of  another  language  (other  than  those  already  reserved 
in  the  Ada  language)  are  not  treated  as  reserved  words  by  an 
Ada  compiler.  A  Class  A  test  is  passed  if  no  errors  are 
detected  at  compile  time  and  the  program  executes  to  produce 
a  message  indicating  that  it  has  passed.  If  a  Class  A  test 
cannot  be  compiled  and  executed  because  of  its  sice,  then 
the  test  is  split  into  a  set  of  smaller  subtests  that  can  be 
processed.  No  splits  were  required  for  class  A  tests. 


The  following  table  shows  that  all  applicable  Class  A  tests 
passed : 


RESULT 


Passed 

Failed 

Inapplicable 

Anomalous 

Withdrawn 

TOTAL 


2  3  4  5 

15  9  0  5 

0  0  0  0 

0  0  0  0 

0  0  0  0 

0  0  0  0 

15  9  0  5 


CHAPTER 

6  7  8  9  10 

2  12  13  3  0 

0  0  0  0  0 

0  0  0  0  0 

0  0  0  0  0 

0  0  0  0  0 

2  12  13  3  0 


1  12  14  TOTAL 

0  0  9  68 

0  0  0  0 

0  0  0  0 

0  0  0  0 

0  0  0  0 

0  0  9  68 


I 


t 


2.1.2  Class  B  Tests 

Class  B  tests  check  that  a  compiler  detects  illegal  language 
usage.  Class  B  tests  are  not  executable.  Each  test  in  this 
class  is  compiled  and  the  resulting  compilation  listing  is 
examined  manually  to  verify  that  every  syntax  or  semantic 
error  in  the  test  is  detected.  A  Class  B  test  is  passed  if 
every  illegal  construct  that  it  contains  is  detected  by  the 
compiler.  If  one  or  more  errors  are  not  detected,  then  a 
version  of  the  test  is  created  that  contains  only  the 
undetected  errors.  The  resulting  "split"  is  compiled  and 
examined.  The  splitting  process  continues  until  all  errors 
are  detected  by  the  compiler.  Splits  were  required  for  3 
tests  : 

B22003A  B23004A  B97101E 


The  following  table  shows  that  all  applicable  Class  B  tests 
passed : 


RESULT  CHAPTER 

2  3  4  5  6  7  8  9  10  11  12  14  TOTAL 


Passed  39 
Failed  0 
Inapplicable  0 
Anomalous  0 
Withdrawn  0 
TOTAL  3  9 


84  86  109  73 

0  0  C  0 

2  0  4  0 

0  0  0  0 

0  10  0 
86  87  113  73 


66  46  87  36 

0  0  0  0 
15  0  0 

0  0  0  0 
0  1  0  1 

67  52  87  37 


8  159  18  811 

0  0  0  0 

0  10  13 

0  0  0  0 

0  10  4 

8  161  18  828 


„  'W  * 
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2.1.3  Class  C  Tests 

Class  C  tests  check  that  legal  Ada  programs  can  be  correctly 
compiled  and  executed.  Each  Class  C  test  is  self-checking 
and  produces  a  PASS/FAIL  message  indicating  the  result  when 
it  is  executed.  If  a  Class  C  test  cannot  be  compiled 
because  it  exceeds  the  compiler's  capacity,  then  the  test  is 
split  into  smaller  subtests  until  all  are  compiled  and  exe¬ 
cuted.  No  splits  were  required  for  class  C  tests: 


The  following  table  shows  that  all  applicable  Class  C  tests 
passed : 


RESULT  CHAPTER 

2  3  4  5  6  7  8  9  10  11  12  14  TOTAL 


Passed  39 
Failed  0 
Inapplicable  21 
Anomalous  0 
Withdrawn  0 
TOTAL  60 


133  215  117  82 

0  0  0  0 

76  87  2  0 

0  0  0  0 

13  0  0 

210  305  119  82 


18  96  108  42 

0  0  0  0 
0  112 
0  0  0  0 
0  0  2  5 

18  97  111  49 


20  56  192  1113 

0  0  0  0 
0  0  12  202 
0  0  0  0 
0  0  1  12 
20  56  205  1332 


nur^ir^i 
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2.1.4  Class  O  Tests 

Class  D  tests  check  the  compilation  and  execution  capacities 
of  a  compiler.  Since  there  are  no  requirements  placed  on  a 
compiler  by  the  Ada  Standard  for  the  number  of  identifiers 
permitted  in  a  compilation,  the  number  of  units  in  a 
library,  the  number  of  nested  loops  in  a  subprogram  body, 
and  so  on,  a  compiler  may  refuse  to  compile  a  Class  D  test. 
Each  Class  D  test  is  self-checking  and  produces  a  PASS/FAIL 
message  indicating  the  result  when  it  is  executed.  If  a 
Class  D  test  fails  to  compile  because  the  capacity  of  the 
compiler  is  exceeded,  then  the  test  is  classified  as  inap¬ 
plicable. 


The  following  table  shows  that  all  applicable  Class  D  tests 
Dassed : 


RESULT 


CHAPTER 
7  8  9 


10  11  12  14  TOTAL 


Passed 

Failed 

Inapplicable 

Anomalous 

Withdrawn 

TOTAL 


1 

0 

0 

0 

0 

1 


0 

0 


0 

0 

0 


4 

0 

0 

0 

0 

4 


9 

0 

0 

0 

0 

9 


3 

0 

0 

0 

0 

3 


0  0 
0  0 


0  0 
0  0 


0 

0 

0 


0 

0 


0  0 


0 

0 

0 

0 


0 

0 

0 

0 


0 

0 

0 

0 

0 

0 


0 

0 

0 

0 

0 

0 


0 

0 

0 

0 

0 

0 


Capacities  measured  by  the  Class  D  tests  are  detailed  in 
section  2.4,  IMPLEMENTATION  CHARACTERISTICS . 
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0 

0 

0 
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2.1.5  Class  E  Tests 

Class  E  tests  provide  information  about  the  compiler  in 
those  areas  in  which  the  Ada  Standard  permits  implementa¬ 
tions  to  differ.  Each  Class  E  test  is  executable  and  pro¬ 
duces  messages  that  indicate  how  the  Ada  Standard  is  inter¬ 
preted.  However,  in  some  cases  the  Ada  Standard  permits  a 
compiler  to  detect  a  condition  either  at  compile  time  or  at 
execution  time,  and  thus  a  Class  E  test  may  correctly  fail 
to  execute.  A  Class  E  test  is  passed  if  it  fails  to  compile 
and  appropriate  error  messages  are  issued,  or  if  it  executes 
properly  and  produces  a  message  that  it  has  passed.  If  a 
Class  E  test  cannot  be  compiled  and  executed  because  of  its 
size,  then  the  test  is  split  into  a  set  of  smaller  subtests 
that  can  be  processed.  No  splits  were  required  for  class  E 
tests  : 


The  following  table  shows  that  all  applicable  Class  E  tests 
passed : 


RESULT  CHAPTER 

2  3  4  5  6  7  8  9  10  1112  14  TOTAL 


Passed 

Failed 

Inapplicable 

Anomalous 

Withdrawn 

TOTAL 


1 

0 

0 

0 

0 

1 


3 

0 

0 

0 

0 

3 


2 

0 

0 

0 

0 

2 


1 

0 

0 

0 

0 

1 


1 

0 

0 

0 

0 

1 


0 

0 

0 

0 

0 

0 


0 

c 

0 

0 

0 

0 


0 

0 

0 

0 

0 

0 


0 

0 

2 

0 

0 

2 


0 

0 

0 

0 

0 

0 


0 

0 

0 

0 

0 

0 


0 

0 

0 

0 


9 

0 

0 

4- 

0 

0 

.1 


Information  obtained  from  the  Class  E  tests  is  detailed  in 
section  2.4,  IMPLEMENTATION  CHARACTERISTICS. 


„•  «  y  „*  „»  /  /  /  /  ,,  .  .  .  .  #  .  *  .  •  .  •  *  /  n  *  <  y  *»  *»  /  I 
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2.1.7  Support.  Units 


Three  packages  support  the  self -checking  features  of  Class  C 
tests:  REPORT,  CHECK_FILE,  and  VAR_STRINGS.  The  REPORT  pack¬ 
age  provides  the  mechanism  by  which  executable  tests  report 
results.  It  also  provides  a  set  of  identity  functions  that 
are  used  to  defeat  some  compiler  optimization  strategies  to 
cause  computations  to  be  made  by  the  target  computer  instead 
of  the  by  the  compiler  on  the  host  computer.  The  CHECK  FILE 
package  is  used  to  check  the  contents  of  text  files  wrTtten 
by  some  of  the  Class  C  tests  for  Chapter  14  of  the  Ada  Stan¬ 
dard.  The  VAR  STRINGS  package  defines  types  and  subprograms 
for  manipulating  varying-length  character  strings.  The 
operation  of  these  three  packages  is  checked  by  a  set  of 
executable  tests.  These  tests  produce  messages  that  are 
examined  manually  to  verify  that  the  packages  are  operating 
correctly.  If  these  packages  are  not  operating  correctly, 
then  validation  is  not.  attempted. 

An  applicant  is  permitted  to  substitute  the  body  of  package 
REPORT  with  an  equivalent  one  if  for  some  reason  the  origi¬ 
nal  version  provided  by  the  ACVC  cannot  be  executed  on  the 
target  computer.  Package  REPORT  was  modified  for  this  vali¬ 
dation  in  order  to  print  an  identifying  message  as  well  as 
date  and  time  of  execution. 

All  support  package  specifications  and  bodies  were  compiled 
and  were  demonstrated  to  be  operating  correctly. 
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2.2  Withdrawn  Tests 


Some  tests  are  withdrawn  from  the  ACVC  because  they  dc  not 
conform  to  the  Ada  Standard.  When  testing  was  performed, 
the  following  16  tests  had  been  withdrawn  for  the  reasonj 
indicated : 


C35904A:  Th?  elaboration  of  subtype  declarations  SFX3  SFX4 

may  raise  NUHF.R  IC_ERR0R  vs.  CONSTRA I  NT_ERR0R. 

C41404A:  Th?  values  of  'LAST  and  'LENGTH  in  the  "if"  statements 

from  line  74  to  the  end  of  the  test  are  incorrect 

C48008A:  Ttiis  test  requires  that  the  evaluation  of  default 
initial  values  not  occur  if  an  exception  is  raised  by  an 
allocator.  However.  the  LMC  has  ruled  that  such  a 
requirement  is  incorrect  (AI-00397). 

34A010C:  Th?  object  declaration  in  line  18  follows  a  subprogram 

body  of  the  same  declarative  part. 

C4A014A:  The  number  declarations  in  lines  19-22  are  not 

correct,  because  conversions  are  not  static. 

B82AC6B:  The  Ada  Standard  8.3(17)  and  AI-00330  permit  the  label 

LA3_ENUMEnAL  of  line  SO  to  be  considered  a  homograph  of 
th?  enumeration  literal  in  line  25. 

C92Q05A.  At  line  40,  "/="  for  type  PACK. BIG  INT  is  not  visible 
without  a  "use"  clause  for  pac kage~PACK. 


C9A0ACA  This  test  assumes  that  allocated  task  TT1  will  run  prior  to 
th?  main  program,  and  thus  assign  SPYNUMB  the  value  checked 
for  by  the  main  program;  however,  such  an  execution  order  i= 
not  required  by  the  Ada  Standard,  so  the  test  is  erroneous 

CA10033  This  test  requires  all  of  the  legal  compilation  units 

of  a  file  containing  some  illeaal  units  to  be  compiled 
and  executed  But  according  to  Al-00255  such  a  file  may 
be  rejected  as  a  whole. 

BA2001E  The  Ada  Standard  10.2(5)  states  that  “simple  names 

of  all  subunits  that  have  the  same  ancestor  library  unit 
must  be  distinct  identifiers."  This  test  checks  for  the 
above  condition  when  stubs  are  declared;  but  it  is  not 
clear  that  the  check  must  be  made  then,  as  opposed  to 
when  the  subunit  is  compiled. 

CA3005A. . D  (4  tests)  There  exists  no  valid  elaboration  order 
for  these  tests. 

3C3204C:  The  file  3C3204C4  should  contain  the  body  for  PC320JC0 

— as  indicated  in  line  25  of  BC3204C3M. 

CE2107E  TENP_HA5_NAHE  must  be  given  an  initial  value  of  TRUE 
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2.3  Inapplicable  Tests 


N/A-Tests 


count 


reason 


C24113L 

Y 

14 

C35705L 

Y 

14 

C35706L 

Y 

14 

C35707L 

Y 

14 

C35708L 

Y 

14 

Value  of  $Digits  exceeds 

C35802L 

Y 

14 

SYSTEM. MAX  DIGITS 

C45241L 

Y 

14 

(170  testsT 

C45321L 

Y 

14 

C45421L 

Y 

14 

C45424L 

Y 

14 

C45521L 

Z 

15 

C45621L 

Z 

15 

C24113E 

•  • 

K 

7 

Source  lines  longer  than 

80  characters 

C 3 400 ID 

•  ♦ 

G 

4 

The  implementation  does 

C  3  5  7  0  2 A 

•  • 

B 

2 

not  support  SHORT  INTEGER 

B52004D 

•  • 

E 

2 

LONG  INTEGER,  other  INTEG] 

B55B09C 

•  • 

D 

2 

types,  SHORT  FLOAT,  or 

C55B07A 

•  • 

B 

2 

LONG  FLOAT 

B86001CP 

•  • 

S 

4 

C86001F 

1 

package  SYSTEM  is  used 

by  package  TEXT  10 

CA3004E 

•  • 

F 

2 

pragma  INLINE  is  not 

LA3004A 

•  * 

B 

2 

supported 

23 


N/A-Tests 

count 

reason 

CE2107B  ..  D 

CE2110B 

CE2111D 

CE2111H 

CE31113  ..  E 

CE3114B 

CE3115A 

3 

1 

1 

1 

4 

1 

1 

one  internal  file 
can  be  associated  with 
more  than  one  external 
file  only  for  reading 

B86001DT 

1 

the  only  predefined  numeric 

types  are  integer  and  float 

96005B 

1 

no  duration ' base  values 

outside  type  duration  exist 

EA3004C  ..  D 

2 

pragma  inline  has  no  effect 

C48006B 

1 

discriminant  constraints 

B37004A 

1 

are  not  allowed  before 

B38105B 

1 

full  type  declaration 

B742C7A 

1 

BC3503A 

1 

total  count  219 


2.4  Implementation  Characteristics 

One  of  the  purposes  of  validation  is  to  determine  the 
behavior  of  a  compiler  in  those  areas  of  the  Ada  Standard 
that  permit  implementations  to  differ.  Class  D  and  E  tests 
specifically  check  for  such  implementation  differences, 
however,  inapplicable  tests  in  other  classes  also  character¬ 
ize  an  implementation.  This  compiler  is  characterized  by 
the  following  interpretations  of  the  Ada  Standard: 

.  Non-graphic  characters. 

Non-graphic  characters  are  defined  in  the  ASCII  char¬ 
acter  set  but  are  not  permitted  in  Ada  programs,  even 
within  character  strings.  The  compiler  correctly 
recognizes  these  characters  as  illegal  in  Ada  compila¬ 
tions.  The  characters  are  not  printed  in  the  output 
listing  but  are  contained  in  the  protocol  files  on 
disk . 

.  Capacities. 

The  compiler  correctly  processes  compilations  contain¬ 
ing  loop  statements  nested  to  65  levels,  block  state¬ 
ments  nested  to  65  levels,  procedures  nested  to  17 
levels,  and  723  variables. 

.  Universal  integer  calculations. 

An  implementation  is  allowed  to  reject  universal 
integer  calculations  having  values  that  exceed 
SYSTEM .MAX_INT .  This  implementation  does  not  reject 
such  calcuTations  and  processes  them  correctly. 

.  Predefined  types. 

This  implementation  does  not  support  numeric  types 
other  than  INTEGER  and  FLOAT. 

.  Based  literals. 

An  implementation  is  allowed  to  reject  a  based  literal 
with  value  exceeding  SYSTEM .MAX_INT  during  compilation 
or  it  may  raise  NUMERIC_ERROR  during  execution.  This 
compiler  raises  NUMERIC  ERROR  during  execution. 

Array  types. 

An  implementation  is  allowed  to  raise  NUMERIC  ERROR 
for  an  array  having  a  'LENGTH  that  exceeds 
STANDARD.  INTEGER  '  LAST  and/or  SYSTEM  . MAX_INT .  l/hen  an 
array  type  is  declared  with  an  index  range  exceeding 
INTEGER  values  and  with  a  component  that  is  a  null 
BOOLEAN  array,  this  compiler  raises  NUMERIC  ERROR  when 


the  type  is  declared. 


When  an  array  type  is  declared  with  an  index  range 
exceeding  SYSTEM. MAX_INT  values  and  with  a  component 
that  is  a  null  BOOLEAN  array,  this  compiler  raises 
NUMERIC_ERROR  when  on  object  of  this  type  is  declared. 

A  packed  BOOLEAN  array  of  length  INTEGER ' LAST+3  raises 
NUMERIC_ERROR  when  the  array  objects  are  declared.  A 
packed  two-dimensional  BOOLEAN  array  with 
INTEGER ' LAST+3  components  raises  NUMERIC_ERROR  when 
the  array  objects  are  declared. 

A  null  array  with  one  dimension  of  length  exceeding 
INTEGER' LAST  raises  NUMERIC_ERROR  when  the  array  type 
is  declared. 

In  assigning  one-dimensional  array  types,  the  entire 
expression  is  evaluated  before  CONSTRAINT_£RRCR  is 
raised  when  checking  whether  the  expression's  subtype 
is  comptaible  with  the  target's  subtype.  In  assigning 
two-dimensional  array  types,  the  entire  expression  is 
not  evaluated  before  CONSTRAINT_ERROR  is  raised  when 
checking  whether  the  expression's  subtype  is  compati¬ 
ble  with  the  target's  subtype.  In  assigning  record 
types  with  discriminants,  the  entire  expression  is 
evaluated  before  CONSTRAINT_ERRCR  is  raised  when 
checking  whether  the  expression's  subtype  is  compati¬ 
ble  with  the  target's  subtype. 

Discriminated  types. 

An  incompletely  declared  type  with  discriminants  may 
not  be  used  in  an  access  type  definition  and  con¬ 
strained  either  there  or  in  later  subtype  indications. 

Aggregates . 

When  evaluating  the  choices  of  a  multi -dimensional 
aggregate  all  choices  are  evaluated  before  checking 
against  the  index  type. 

When  evaluating  an  aggregate  containing  subaggregates, 
all  choices  are  evaluated  before  being  checked  for 
identical  bounds. 

Functions . 


The  declaration  of  a  parameterless  function  with  the 
same  profile  as  an  enumeration  literal  in  the  same 
immediate  scope  is  allowed  by  the  implementation. 


Representation  clauses. 

'SMALL  length  clauses  are  supported. 

Enumeration  representation  clauses  are  supported. 
Generics . 

When  given  a  separately  compiled  generic  declaration, 
some  illegal  instantiations,  and  a  body,  compiler 
rejects  the  body  because  of  the  instantiations. 

Package  CALENDAR. 

TIME_OF  and  SPLIT  are  inverses  when  SECONDS  is  a  non¬ 
model  number. 

Pragmas . 

Pragma  INLINE  is  not  supported  for  procedures.  It  is 
not  supported  for  functions. 

Input/output . 

Package  SEQUENTIAL_IO  can  be  instantiated  with  uncon¬ 
strained  array  types  and  record  types  with  discrim¬ 
inants.  Package  DIRECT_IO  can  be  instantiated  with 
unconstrained  array  types  and  record  types  with 
discriminants  without  defaults.  A  form  parameter  is 
needed  in  the  case  of  DIRECT_IO  and  unconstrained 
array  types . 

More  than  one  internal  file  can  be  associated  with 
each  external  file  for  sequential  I/O,  direct  I/O,  and 
text  I/O  for  reading  only.  An  external  file  associ¬ 
ated  with  more  than  one  internal  file  cannot  be 
deleted . 

An  existing  text  file  can  be  opened  in  OUT_FILE  mode, 
can  be  created  in  OUT_FILE  mode,  and  can  be  created  in 
IN_FILE  mode . 

Dynamic  creation  and  resetting  of  a  sequential  file  is 
allowed . 

Temporary  sequential  files  are  given  a  name.  Tem¬ 
porary  direct  files  are  given  a  name.  Temporary  text 
files  given  names  are  deleted  when  they  are  closed. 

Temporary  text  files  have  a  name.  Temporary  textfiles 
are  deleted  when  closed. 
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CHAPTER  3 

Compiler  Anomalies  and  Nonconformances 
3.1  Anomalies 

An  anomaly  is  a  test  result  that,  given  the  pre-validation 
analysis,  was  not  expected  during  formal  validation  but 
which  is  judged  allowable  by  the  AVF  and  the  AVO  under  the 
circumstances  of  the  validation.  No  anomalies  were  detected 
in  this  validation  attempt. 


3.2  Nonconformances 

Any  discrepancy  between  expected  test  results  and  actual 
test  results  is  considered  to  be  a  nonconformance.  No  non¬ 
conformances  were  detected  in  this  validation  attempt. 


CHAPTER  4 


ADDITIONAL  TESTING  INFORMATION 

4.1  Pre-Validation 

Prior  to  validation,  a  set  of  test  results  for  ACVC  1.7  pro¬ 
duced  by  the  SYSTEAM-German  MoD  SI. 5  compiler  was  submitted 
to  IA3G  m.b.H.,  Dept  SZT  by  the  applicant  for  pre-validation 
review.  Analysis  of  these  results  demonstrated  that  the 
compiler  successfully  passed  all  applicable  tests. 


4.2  Test  Site 

Tests  were  compiled  and  executed  at  IABG  in  Ottobrunn  on  the 
AVF ' s  Siemens  7.536  computer. 


4.3  Test  Tape  Information 

The  original  tapes  containing  ACVC  version  1.7  as  received 
from  the  AVO  were  read  by  the  validation  team.  The  withdrawn 
tests  were  deleted  (except  for  one  whose  result  was  ignored) 
and  the  tests  which  make  use  of  implementation  dependent 
parameters  were  customized. 


4.4  Testing  Logistics 

Once  all  tests  had  been  loaded  to  disk,  processing  was  begun 
using  command  scripts  provided  by  the  AVF.  Samples  of  the 
text  of  these  scripts  are  given  in  Appendix  C. 

The  compiler  supports  various  options  that  control  its 
operation.  The  options  used  for  testing  are  evident  from 
the  example  in  Appendix  C.  The  B-tests  were  run  with  the 
additional  compiler  option  LIST=>OV,  which  produces  a  full 
compilation  protocol  including  error  messages. 

First  a  project  library  REPLIB  was  prepared  to  contain  the 
report  package.  Then  a  number  of  batch  jobs  were  initiated, 
one  at  a  time,  to  process  the  tests.  Each  job  for  executable 
tests  created  a  new  project  library  with  REPLIB  as  parent 
library.  Test  results  were  written  to  system  files  in  con¬ 
catenated  form.  These  files  were  written  on  tape  in  backup 
format  and  archived. 


4.5  Testing  Duration 

The  ACVC  has  not  been  designed  for  use  in  measuring  compiler 
performance.  However,  information  about  the  length  of  time 
needed  to  test  the  compiler  may  characterize  compiler 
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performance  in  processing  a  large  number  of  programs. 

Testing  started  at  86-06-04  and  was  completed  on  86-06-24. 
The  machine  idled  for  about  100  hours  because  of  power  dis¬ 
turbances  . 


SUMMARY  AND  CONCLUSIONS 


The  IABG  m.b.H.,  Dept  SZT  identified  2093  of  the  2279  tests 
in  Version  1.7  of  the  Ada  Compiler  Validation  Capability  to 
be  processed  during  the  validation  of  SYSTEAM-German  MoD 
SI. 5.  Because  of  test  errors,  16  tests  were  withdrawn.  219 
tests  were  not  applicable,  170  of  them  because  they  use 
floating  point  types  having  digits  that  exceed  the  maximum 
value  for  that  implementation.  The  remaining  2044  processed 
tests  were  passed  by  the  compiler. 

The  IABG  m.b.H.,  Dept  SZT  concludes  that  these  results 
demonstrate  acceptable  conformance  to  the  Ada  Standard. 
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APPENDIX  A 


COMPLIANCE  STATEMENT 


The  only  allowed  implementation  dependencies  correspond  to 
implementation-dependent  pragmas  and  attributes,  to  certain 
machine-dependent  conventions  as  mentioned  in  Chapter  13  of 
MIL-STD-181 5A,  and  to  certain  allowed  restrictions  on 
representation  clauses.  The  implementation-dependent  charac¬ 
teristics  of  the  SYSTEAM-German  MoD  SI. 5  are  described  in 
the  following  sections  which  discuss  topics  one  through 
eight  as  stated  in  Appendix  F  of  the  Ada  Language  Reference 
Manual  ( ANSI/MIL-STD-181 5A) . 


thl 

:$1 


r.fr 


SMS‘1 


32 


(1)  Implementation-Dependent  Pragmas 
INTERFACE 

Takes  ASSEMBLER  , subprogram_name  as  argument (s). 

This  pragma  is  allowed  at  the  place  of  declarative  items. 

This  pragma  specifies  that  an  object  module  generated 
by  the  system  assembler  is  supplied  for  the  subprogram. 

SUPPRESS-ALL 

Takes  no  argument.  This  pragma  is  allowed  at 
the  place  of  the  start  of  a  compilation. 

This  pragma  specifies  that  all  checks  which  may 
raise  CONSTRAINT_ERROR  at  runtime  are  suppressed. 

» 

(2)  Implementation-Dependent  Attributes 

BEAP_ADDRESS  The  value  of  this  attribute  is  of  type  ADDRESS. 


33 


(3)  Package  SYSTEM 

The  specification  for  package  SYSTEM  is 

package  SYSTEM  is 

type  ADDRESS  is  private; 
type  NAME  is  ( siemens_bs 2000 ) ; 

SYSTEM_NAME  :  constant  NAME  :=  siemens_bs 2000 ; 
STORAGE_UNIT  :  constant  :=  8; 

MEM0RYJ5IZE  :  constant  :=  5*2:1:E20;  —  SMB 

System-Dependent  Named  Numbers: 

MIN_INT  :  constant  :=  -2_147_483_648 ; 

MAX_INT  :  constant  :=  2_147__483_647 ; 

MAX_DIGITS  r  constant  :=  15; 

MAX_M ANT  I S  S A  :  constant  :=  51; 

FINE_DELTA  :  constant  :=  2:1.0:E-30; 

TICK  :  constant  :=  2:1.0:E-14; 

--  Other  System-Dependent  Declarations 

subtype  PRIORITY  is  INTEGER  range  0  ..  255; 

type  UNIVERSAL_INTEGER  is  range 
MIN  INT  ..  MAX_INT; 
subtype  EXTERNAL_ADDRESS  is  STRING; 
type  ADDRESS  RANGE  is  range 
0  ..  2:1: E24-1 ; 

function  CONVERT_ADDRESS  ( ADDR :  EXTERNAL_ADDRESS ) 

return  ADDRESS; 
function  CONVERT_ADDRESS  (ADDR:  ADDRESS) 

return  EXTERNAL  ADDRESS; 
function  CONVERT_ADDRESS  (ADDR:  ADDRESS_RANGE ) 

return  ADDRESS; 
function  CONVERT_ADDRESS  (ADDR:  ADDRESS) 

return  ADDRESS_RANGE ; 
function  "+"  (ADDR:  ADDRESS; 

OFFSET: INTEGER) 
return  ADDRESS; 

private 

type  ADDRESS  is  access  BOOLEAN; 
end  SYSTEM; 
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(4)  Representation  Clause  Restrictions 

Representation  clauses  specify  how  the  types  of  the 
language  are  to  be  mapped  onto  the  underlying  machine. 
The  following  are  restrictions  on  representation 
clauses . 


for  t'size  use  static__expression 

For  integer,  enumeration  and  fixed  point  type  t,  16, 
24  and  32  are  allowed  as  value  of  static_expression 
depending  on  the  range  and  the  'small  of  t.  For  access 
types  t,  only  32  is  allowed  as  value  of 
static_expression .  For  floating  point  types  t,  only  64 
is  allowed  as  value  of  static_expression . 

For  record  and  array  types,  the  value  of 
static_expression  must  match  the  size  computed  by  the 
compiler.  This  means  that  the  type  mapping  for  records 
and  arrays  cannot  be  influenced  by  a  'size  rep. spec. 

for  'small  use  static^expression 

For  the  value  of  the  static_expression  only  a  power  of 
two,  i.e.  2.0**k  for  some  integer  k,  is  allowed. 

for  access_type'  storage_size  use  expression, 
for  task_type  storage^size  use  expression 

There  is  no  restriction  concerning  the  value  of  expres¬ 
sion  . 


Address  Clause 


Is  implemented  for  objects  only. 


(5)  Conventions 
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There  are  no  implementation-generated  names  denoting 
implementation -dependent  components . 


(6)  Address  Clauses 

The  following  are  conventions  that  define  the  interpre¬ 
tation  of  expressions  that  appear  in  address  clauses, 
including  those  for  interrupts. 

The  object  starts  at  the  given  address.  For  objects 
accessed  by  a  descriptor,  the  descriptor  starts  at  the 
given  address. 

An  object  for  which  an  address  specification  is  given 
must  not  require  an  initialization. 


y, 


(7)  Unchecked  Conversions 

The  following  are  restrictions  on  unchecked  conver¬ 
sions,  including  those  depending  on  the  respective 
sizes  of  objects  of  the  source  and  target. 

If  TARGET' SIZE  >  SOURCE' SIZE  results  will  be  unpredict¬ 
able  . 


I 
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(8)  Input-Output  Packages 

The  following  are  implementation-dependent  characteris¬ 
tics  of  the  input-output  packages. 


SEQUENTIAL  10  Package 

type  FILE  TYPE  is  limited  private; 


—  integer 


f 

procedure 

CREATE 

( 

...  ) 

function 

MODE 

( 

...  )  ; 

procedure 

OPEN 

( 

...  ) 

function 

NAME 

( 

...  )  ; 

£ 

procedure 

CLOSE 

( 

...  ) 

function 

FORM 

( 

...  )  ; 

. ' 

procedure 

DELETE 

( 

•  .  .  ) 

function 

IS  OPEN 

( 

...  )  ; 

V 

procedure 

RESET 

( 

...  ) 

function 

END  OF  FILE 

( 

...  ); 

1 

procedure 

READ 

( 

...  ) 

procedure 

WRITE 

( 

...  ) 

DIRECT  10  Package 

type  COUNT  is  range  0  ..  2_147_483_647 ; 
TEXT  10  Package 

type  COUNT  is  range  0  ..  2_147_483_647 ; 
subtype  FIELD  is  INTEGER  range  0  ..  255; 


LOW  LEVEL  10 

type  DEVICE_TYPE  is  ( NULL_DEVICE) ; 

type  DATA_TYPE  is  record  null;  end  record; 

procedure  SEND_C0NTR0L  (DEVICE  ;  DEVICE_TYPE; 

DATA  ;  in  out  DAT A_TYP E ) ; 
procedure  RECEI VE_C0NTR0L  (DEVICE  :  DEVICE_TYPE ; 

DATA  :  in  out  DATA  TYPE); 
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(9)  Package  STANDARD 

type  INTEGER  is  range  -2_147_483_648  ..  2_147_483_647 ; 

type  FLOAT  is  digits  15 

range  -16:0. FFFF_FFFF_FFFF_FF :  E+63 

16:0. FFFF_FFFF_FFFF_FF : E+63 ; 

type  DURATION  is  delta  2:1.0:E-14 

range  -131_072.0  .. 

131  071.999  938  964  843  75; 


(10)  File  Names 

File  names  make  use  of  the  following  conventions  and 
restrictions . 

They  must  be  BS2000-f ile-names ,  max.  54  characters 
long, upper  case  letters.  At  most  15  user-defined  files 
may  be  open  at  a  time. 


(11)  Other  Characteristics 

The  maximum  source  program  line  length  is  80. 

The  program  library  may  contain  at  most  2_000  units. 
One  compilation  unit  may  import  at  most  63  units 
directly . 


Z&SBSSSi 


-  38  - 


APPENDIX  B 
TEST  PARAMETERS 


Certain  testis  in  the  ACVC  make  use  of  implementation- 
dependent  values,  such  as  the  maximum  length  of  an  input 
line  and  invalid  file  names.  A  test  that  makes  use  of  such 
values  is  identified  by  the  extension  . TST  in  its  file  name. 
Actual  values  to  be  substituted  are  identified  by  names  that 
begin  with  a  dollar  sign.  A  value  is  substituted  for  each 
of  these  names  before  the  test  is  run.  The  values  used  for 
this  validation  are  given  below. 


$MAX_IM_LEN 

.Maximum  input  line  length 

permitted  by  the  implementation. 


3BIG_ID1 

string  (1  . . 

80) 

:  = 

Identifier  of  size  MAX  IN  LEN 

(1  . .  79  => 

'  A'  , 

with  varying  last  character. 

80  => 

’  1  ‘ 

) 

3  3 IG  ID2 

string  (1  . . 

80) 

:  = 

Identifier  of  size  MAX  IN  LEN 

(1  .  .  79  => 

'  A'  , 

with  varying  last  character. 

8C  => 

,  2  , 

) 

$3IG_ID3 

string  (1  .  . 

80) 

;  = 

Identifier  of  size  MAX  IN  LEN 

(1  . .  40  =» 

'  A'  , 

with  varying  middle  character. 

41  => 

'  1  '  , 

42  . .  SO  => 

'A' 

) 

53IC-  ID4 

string  (1  . . 

30) 

:  = 

Identifier  of  size  MAX  IN  LEN 

(1  . .  40  => 

'A'  , 

with  varying  middle  character. 

41  => 

‘2'  , 

42  . .  80  => 

'A' 

) 

$  N  E  G_  B AS  E D_ I N T  16  :  FFFFFFFE  : 

A  based  integer  literal  whose 
highest  order  non-zero  bit 
falls  in  the  sign  bit 

position  of  the  representation 
for  SYSTEM. MAX  INT. 


$3IG_INT_LIT  string  (1  ..  80)  := 

An  integer  literal  of  value  298  (1  ..  77  =>  'O', 
with  enough  leading  zeroes  so  78  . .  SO  =>  "298") 
that  it  is  MAX_IN  LEN  characters 
long  . 


$s:g_real_lit 

A  real  literal  that  can  be 
either  of  floating  or  fixed 
point  type,  has  value  690.0,  and 
has  enough  leading  zeroes  to  be 
MAX  IN  LEN  characters  long. 


string  (1  ..  80)  := 

(  1  .  .  74  =>  ‘O', 

75  .  .  SO  =>  "69.0E1" ) 


5  EXTENDED_ASCI I_CHARS  "abcdef ghi jklmnopqr stu 

A  string  literal  containing  all  vwxyz  1  3%?9  C  XI  a  v  l } 
the  ASCII  characters  with 
printable  graphics  that  are  not 
m  the  basic  55  Ada  character 
set . 


3NCM_ASC  I  I_CHAR_TYPE 

An  enumerated  type 
for  a  character 
literals  are  the 
NCN_NULL  and  all 
characters  with 

graphics  . 


(  ::cn_;;ull) 

definition 
type  whose 
identifier 
non-ASC I I 
printable 


$  BLANKS 

string  ( 1 

31anks  of  length 

I'lhA  IN  LEN 

-  20 

( 1 . . 60  => 

$MAX_DIGITS 

15 

Maximum  digits 

supported 

for 

floating  point  types. 


$INTEGER_FIRST  -2147483648 

The  universal  integer  literal 
expression  whose  value  is 
INTEGER' FIRST. 

$ INTEGER_LAST  2147483647 

The  universal  integer  literal 
expression  whose  value  is 

INTEGER' LAST. 


$  LESS  THAN  DURATION 


0 . 0 


40 


t: 


A  universal  real  value  that  lies 
between  DURATION ' BASE ' FIRST  and 
DURATION ' FIRST  or  any  value  in 
the  range  of  DURATION. 

$ GREATER  THAN_DURAT ION  0.0 

A  universal  real  value  that  lies 
between  DURATION ' BASE ' LAST  and 
DURATION ' LAST  or  any  value  in 
the  range  of  DURATION. 

$LESS_THAN_DURATION_BASE_FIRST  -  200_000.0 

The  universal  real  value  that  is 
less  than  DURATION ' BASE ' FIRST. 

$GREATER_THAN_DURATION_BASE_LAST  200_000. 0 

The  universal  real  value  that  is 
greater  than  DURATION ' BASE ' LAST. 


$COUNT_LAST  2147483647 

Value  of  COUNT' LAST  in  TEXT_IO 
package . 


5FIELD_LAST  255 

Value  of  FIELD' LAST  in  TEXT_I0 
package . 


$FILE_NAME_WITH_BAD_CHARS  abci  def.dat 

An  illegal  external  file  name 
that  either  contains  invalid 
characters  or  is  too  long. 


v 


v 
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$  F I  LE_NAiM  E_W  I  TH_W  I  LD_C  ARD_CHAR 

An  external  file  name  that 
either  contains  a  wild  card 
cnaracter  or  is  too  long. 


abc*def  .dat 


$  I LLEGAL_EXT ERNAL_F I LE_NAM E 1 

Illegal  external  file  name. 


x$ iyz -dat 


$  I LLEGAL_EXT ERNAL_F I LE_NAME 2 

Illegal  external  file  names. 


string  (1  . .  60 )  : = 

( 1  . . '60  =>  ' A' ) 


APPENDIX  C 


COMMAND  SCRIPTS 


/.*Z1i*Z1  LOGON 

/DO  oSYSTEAMl.ADA.DELETELIB/LIBRARY*Z 

/DO  oSYSTEAMl.AD4.CRSATELlB/LIBRARY*Z/PARENT*REPLI0 
/WHEN  /ON*  ( 1 ) 

/00  oSYSTEAMl .ADA. COMPILE/ 

/nCOPY. ZZ.C  Z1 1 01 A-AO.AOA/LIBRARY*Z 

/00  oSYSTEAMl .A0A.LINK/CZ1 101A/ACVC .  C  Z  1 1Q1A,LI3RARY=Z 
/SYSFILE  SYS0UT=(ACVCRE3.CZ/EXTEND) 

/EXEC  ACVC.CZ1 101A 
/ERASE  ACVC.CZ1 101  A 
/STEP 

/SYSFILE  SYSOUT=(PRIMARY) 

/WHEN  / ON  * ( 1 ) 

/DO  oSY STE AMI  .  ADA. COHP  IL E/ 
/BC0PY.ZZ.CZ110ZA-AB.A0A/LIBRARY*Z 

/DO  oSYSTEAMl .ADA.LINK/CZ1102A/ACVC.CZ1102A/LIBRARY*Z 
/SYSFILE  SYSOUT=(ACVCRES.CZ/EXTEMD) 

/EXEC  ACVC.CZ1102A 
/ERASE  ACVC.CZ1102A 
/STEP 

/SYSFILE  SYSOllT*  (PRIMARY) 

/WHEN  /ON=m 

/DO  nSYSTEAMl . ADA . COMP ILE/ 
/oC0PY.ZZ.CZ1103A-8.A0A/LI3RARY=Z 

/DO  oSYSTEAMl. ADA. LI NK/CZ110JA/ACVC.CZ1103A/LI8RARY*! 
/SYSFILE  SYSOUT=<ACVCRES.CZ/EXTEND) 

/EXEC  ACVC.CZ1103A 
/ERASE  ACVC.CZ1103A 
/STEP 

/SYSFILE  SYSOUT* (PRIMARY ) 

/WHEN  / ON  *  (  1  ) 

/DO  a SY STE AMI  . ADA. COMP  ILE/ 
/oCOPY.ZZ.CZ1201A-A3.AOA/LIURARY*Z 

/DO  “SYSTEAMl. ADA. LI NX/CZ1201A/ACVC. CZl 201A, LIBRARY*! 
/SYSFILE  SYSOUT=(ACVCRES.CZ/EXTEND> 

/EXEC  ACVC.CZ1 201A 
/ERASE  ACVC.CZ1201  A 
/STEP 

/SYSFILE  SYS OUT*(PRI MARY) 

/WHEN  / 0  N  * ( 1 ) 

/DO  oSYSTEAMl .ADA. COMPILE/ 

/“COPY.  ZZ.CZ12018-AU.ADA/LIBRARYsZ 

/DO  oSYSTEAMl. ADA. LINIC/CZ12013/ACVC.CZ12013/LI3RARY*Z 
/SYSFILE  SYSOUT  * (ACVCRES.CZ/EXTENO) 

/EXEC  ACVC.CZ12010 
/ERASE  AC '/C. CZl  2013 
/STEP 

/SYSFILE  SYSOUT=(PRIMARY) 

/WHEN  / ON  * ( 1 ) 

/DO  aSYSTEAMI .ADA. COMPILE/ 

/OC0PY.ZZ.CZ1201C-A3. ADA/LI  SR ARY*Z 

/DO  oSYSTEAMl. ADA. LI MK/CZ1201C/ACVC.CZ1201C/LIBRARY*Z 
/SYSFILE  SYSOUT*(ACVCRES.CZ/EXTEND) 

/EXEC  ACVC.CZ1201C 
/ERASE  AC VC . C  Z 1 201 C 
/  STEP 

/SYSFILE  SYSOUT*(PRIMARY) 

/WHEN  / ON  * ( 1 ) 

/DO  oSYSTEAMl .ADA. COMPILE/ 
/aCOPT.ZZ.CZ1201D-A9.AOA/LIBRARY*Z 

/DO  oSYSTEAMl. ADA, LINK/CZ1201D/ACVC.CZ1201D/LI3RARY*Z 

/SYSFILE  SYSOUT«(ACVCRES.CZ/EXTENO) 

/EXEC  ACVC.CZ1201D 
/ERASE  ACVC.CZ1201D 
/STEP 

/SYSFILE  SYSOUT*(PRIMARY) 

/ LOGOFF 


